home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d4
/
gm90eval.arc
/
GM.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-12-05
|
2KB
|
142 lines
ECHO OFF
cls
break on
print/d:prn>nul
:start
cls
f1
:start2
KEYPRESS $
if errorlevel 1 goto nflmenu
goto start2
:nflmenu
cls
f2
:nflstart
KEYPRESS 0 1 2 3 4 5
if errorlevel 6 goto update
if errorlevel 5 goto chknfl
if errorlevel 4 goto trintro
if errorlevel 3 goto s3intro
if errorlevel 2 goto s2intro
if errorlevel 1 goto mainexit
goto nflstart
:mainexit
cls
gmbye
goto bye
:update
cls
update
goto nflmenu
:chknfl
cls
chknfl
goto nflmenu
:trintro
cls
trintro
goto trstart
:trstart
KEYPRESS 0 1 2 3
if errorlevel 4 goto trread
if errorlevel 3 goto trends2
if errorlevel 2 goto trends1
if errorlevel 1 goto trexit
goto trstart
:trexit
cls
echo Exiting NFL TRENDS...
goto nflmenu
:trends1
cls
trends1
cls
goto trintro
:trends2
cls
trends2
cls
echo WORKING...
trends2a < trdata.in > trweek.out
echo WORKING...
trends3
cls
goto trintro
:trread
cls
trread
cls
goto trintro
:s3intro
cls
s3intro
goto s3start
:s3start
KEYPRESS 0 1 2 3
if errorlevel 4 goto s3read
if errorlevel 3 goto system3b
if errorlevel 2 goto system3a
if errorlevel 1 goto s3exit
goto s3start
:s3exit
cls
echo Exiting SYSTEM 3...
goto nflmenu
:system3a
cls
system3a
cls
goto s3intro
:system3b
cls
system3b
cls
echo WORKING...
system3c < s3data.in > s3week.out
echo WORKING...
system3d
cls
goto s3intro
:s3read
cls
s3read
cls
goto s3intro
:s2intro
cls
s2intro
goto s2start
:s2start
KEYPRESS 0 1 2 3
if errorlevel 4 goto s2read
if errorlevel 3 goto system2b
if errorlevel 2 goto system2a
if errorlevel 1 goto s2exit
goto s2start
:s2exit
cls
echo Exiting SYSTEM 2...
goto nflmenu
:system2a
cls
system2a
cls
goto s2intro
:system2b
cls
system2b
cls
echo WORKING...
system2c < s2data.in > s2week.out
echo WORKING...
system2d
cls
goto s2intro
:s2read
cls
s2read
cls
goto s2intro
:bye